package cn.chencq.redis.cluster.util;

import java.io.ByteArrayInputStream;
import java.io.ByteArrayOutputStream;
import java.io.File;
import java.io.FileFilter;
import java.io.IOException;
import java.io.InputStream;
import java.io.ObjectInputStream;
import java.io.ObjectOutputStream;
import java.lang.reflect.Modifier;
import java.net.InetAddress;
import java.net.JarURLConnection;
import java.net.NetworkInterface;
import java.net.SocketException;
import java.net.URL;
import java.net.URLDecoder;
import java.security.NoSuchAlgorithmException;
import java.text.NumberFormat;
import java.text.SimpleDateFormat;
import java.util.Collections;
import java.util.Comparator;
import java.util.Date;
import java.util.Enumeration;
import java.util.LinkedHashSet;
import java.util.List;
import java.util.Properties;
import java.util.Random;
import java.util.Set;
import java.util.UUID;
import java.util.jar.JarEntry;
import java.util.jar.JarFile;
import java.util.regex.Pattern;

import com.google.common.collect.Sets;

/**
 * 工具类
 */
public class Utils {

	/**
	 * 判断一个类是否实现了指定的interface
	 * 
	 * @param c
	 *            需要判断的class
	 * @param szInterface
	 *            指定的interface
	 * @return
	 */
	@SuppressWarnings("rawtypes")
	public static boolean isInterface(Class c, String szInterface) {
		Class[] face = c.getInterfaces();
		for (int i = 0, j = face.length; i < j; i++) {
			if (face[i].getName().equals(szInterface)) {
				return true;
			} else {
				Class[] face1 = face[i].getInterfaces();
				for (int x = 0; x < face1.length; x++) {
					if (face1[x].getName().equals(szInterface)) {
						return true;
					} else if (isInterface(face1[x], szInterface)) {
						return true;
					}
				}
			}
		}
		if (null != c.getSuperclass()) {
			return isInterface(c.getSuperclass(), szInterface);
		}
		return false;
	}

	/**
	 * 从包package中获取所有的Class
	 * 
	 * @param pack
	 * @return
	 */
	public static Set<Class<?>> getClassesByPackage(String pack) {

		// 第一个class类的集合
		Set<Class<?>> classes = new LinkedHashSet<Class<?>>();
		// 是否循环迭代
		boolean recursive = true;
		// 获取包的名字 并进行替换
		String packageName = pack;
		String packageDirName = packageName.replace('.', '/');
		// 定义一个枚举的集合 并进行循环来处理这个目录下的things
		Enumeration<URL> dirs;
		try {
			// 当前线程的类加载器
			dirs = Thread.currentThread().getContextClassLoader().getResources(packageDirName);
			// 循环迭代下去
			while (dirs.hasMoreElements()) {
				// 获取下一个元素
				URL url = dirs.nextElement();
				// 得到协议的名称
				String protocol = url.getProtocol();
				// 如果是以文件的形式保存在服务器上
				if ("file".equals(protocol)) {
					// 获取包的物理路径
					String filePath = URLDecoder.decode(url.getFile(), "UTF-8");
					// 以文件的方式扫描整个包下的文件 并添加到集合中
					findAndAddClassesInPackageByFile(packageName, filePath, recursive, classes);
				} else if ("jar".equals(protocol)) {
					JarFile jar;
					try {
						// 获取jar
						jar = ((JarURLConnection) url.openConnection()).getJarFile();
						// 从此jar包 得到一个枚举类
						Enumeration<JarEntry> entries = jar.entries();
						// 同样的进行循环迭代
						while (entries.hasMoreElements()) {
							// 获取jar里的一个实体 可以是目录 和一些jar包里的其他文件 如META-INF等文件
							JarEntry entry = entries.nextElement();
							String name = entry.getName();
							// 如果是以/开头的
							if (name.charAt(0) == '/') {
								// 获取后面的字符串
								name = name.substring(1);
							}
							// 如果前半部分和定义的包名相同
							if (name.startsWith(packageDirName)) {
								int idx = name.lastIndexOf('/');
								// 如果以"/"结尾 是一个包
								if (idx != -1) {
									// 获取包名 把"/"替换成"."
									packageName = name.substring(0, idx).replace('/', '.');
								}
								// 如果可以迭代下去 并且是一个包
								if ((idx != -1) || recursive) {
									// 如果是一个.class文件 而且不是目录
									if (name.endsWith(".class") && !entry.isDirectory()) {
										// 去掉后面的".class" 获取真正的类名
										String className = name.substring(packageName.length() + 1, name.length() - 6);
										try {
											// 添加到classes
											classes.add(Class.forName(packageName + '.' + className));
										} catch (ClassNotFoundException e) {
											// log
											// .error("添加用户自定义视图类错误 找不到此类的.class文件");
											System.out.println(packageName + '.' + className);
											e.printStackTrace();
										}
									}
								}
							}
						}
					} catch (IOException e) {
						// log.error("在扫描用户定义视图时从jar包获取文件出错");
						e.printStackTrace();
					}
				}
			}
		} catch (IOException e) {
			e.printStackTrace();
		}

		return classes;
	}

	/**
	 * 以文件的形式来获取包下的所有Class
	 * 
	 * @param packageName
	 * @param packagePath
	 * @param recursive
	 * @param classes
	 */
	public static void findAndAddClassesInPackageByFile(String packageName, String packagePath, final boolean recursive, Set<Class<?>> classes) {
		// 获取此包的目录 建立一个File
		File dir = new File(packagePath);
		// 如果不存在或者 也不是目录就直接返回
		if (!dir.exists() || !dir.isDirectory()) {
			// log.warn("用户定义包名 " + packageName + " 下没有任何文件");
			return;
		}
		// 如果存在 就获取包下的所有文件 包括目录
		File[] dirfiles = dir.listFiles(new FileFilter() {
			// 自定义过滤规则 如果可以循环(包含子目录) 或则是以.class结尾的文件(编译好的java类文件)
			public boolean accept(File file) {
				return (recursive && file.isDirectory()) || (file.getName().endsWith(".class"));
			}
		});
		// 循环所有文件
		for (File file : dirfiles) {
			// 如果是目录 则继续扫描
			if (file.isDirectory()) {
				findAndAddClassesInPackageByFile(packageName + "." + file.getName(), file.getAbsolutePath(), recursive, classes);
			} else {
				// 如果是java类文件 去掉后面的.class 只留下类名
				String className = file.getName().substring(0, file.getName().length() - 6);
				try {
					// 添加到集合中去
					// classes.add(Class.forName(packageName + '.' +
					// className));
					// 经过回复同学的提醒，这里用forName有一些不好，会触发static方法，没有使用classLoader的load干净
					classes.add(Thread.currentThread().getContextClassLoader().loadClass(packageName + '.' + className));
				} catch (ClassNotFoundException e) {
					// log.error("添加用户自定义视图类错误 找不到此类的.class文件");
					e.printStackTrace();
				}
			}
		}
	}

	/**
	 * 判断class是否是抽象类
	 * 
	 * @param cla
	 * @return
	 */
	public static boolean isAbstract(Class<?> cla) {
		int modifiors = cla.getModifiers();

		return Modifier.isAbstract(modifiors);
	}

	/**
	 * 获取源目录下的配置文件
	 * 
	 * @param propertiesName
	 *            配置文件的名称
	 * @return 配置文件
	 */
	public static Properties getProperties(String propertiesName) {
		InputStream inputStream = null;
		try {
			inputStream = Thread.currentThread().getContextClassLoader().getResourceAsStream(propertiesName);

			Properties properties = new Properties();
			properties.load(inputStream);

			return properties;
		} catch (Exception e) {
			e.printStackTrace();
			return null;
		} finally {
			try {
				if (null != inputStream) {
					inputStream.close();
				}
			} catch (IOException e) {
				e.printStackTrace();
			}
		}

	}

	/**
	 * 集合求交集
	 * 
	 * @return
	 */
	public static Set<String> interSet(List<Set<String>> setList) {

		Set<String> result = null;
		if (setList == null || setList.size() == 0) {
			return result;
		}

		result = setList.get(0);

		for (int index = 1; index < setList.size(); index++) {
			if (result == null || result.size() == 0) {
				break;
			}

			result.retainAll(setList.get(index));
		}

		return result;
	}

	/**
	 * 集合求差集
	 * 
	 * @return
	 */
	public static Set<String> diffSet(List<Set<String>> setList) {

		Set<String> result = null;
		if (setList == null || setList.size() == 0) {
			return result;
		}

		result = setList.get(0);

		for (int index = 1; index < setList.size(); index++) {
			if (result == null || result.size() == 0) {
				break;
			}
			if (setList.get(index) == null || setList.get(index).size() == 0) {
				continue;
			}
			result.removeAll(setList.get(index));
		}

		return result;
	}

	/**
	 * 集合求并集
	 * 
	 * @return
	 */
	public static Set<String> unionSet(List<Set<String>> setList) {

		Set<String> result = null;
		if (setList == null || setList.size() == 0) {
			return result;
		}
		result = setList.get(0);

		for (int index = 1; index < setList.size(); index++) {
			if (setList.get(index) == null || setList.get(index).size() == 0) {
				continue;
			}
			result.addAll(setList.get(index));
		}

		return result;
	}

	/**
	 * 针对多个集合进行交集运算
	 * 
	 * @param collections
	 *            集合列表
	 * @return 交集列表
	 */
	public static <E> Set<E> collectionIntersection(List<Set<E>> collections) {
		Set<E> result = null;

		// 没有需要求交集的列表
		if (collections == null || collections.size() == 0) {
			return result;
		}

		// 有多个列表
		if (collections.size() > 1) {
			// 先根据各个列表的元素大小进行排序
			Collections.sort(collections, new Comparator<Set<E>>() {

				@Override
				public int compare(Set<E> o1, Set<E> o2) {
					if (o1.size() > o2.size()) {
						return 1;
					} else if (o1.size() < o2.size()) {
						return -1;
					}
					return 0;
				}
			});

			result = Sets.intersection(collections.get(0), collections.get(1));

			for (int i = 2; i < collections.size(); i++) {
				if (result == null || result.size() == 0) {
					break;
				}
				result = Sets.intersection(result, collections.get(i));
			}
		} else if (collections.size() == 0) {
			result = collections.get(0);
		}

		return result;
	}

	/**
	 * 获取当前时间戳
	 * 
	 * @return
	 */
	public static int getTimestamp() {
		return (int) (System.currentTimeMillis() / 1000);
	}

	/**
	 * @param stringObj
	 *            字符串Object
	 * @return
	 */
	public static String isNullDefault(Object stringObj) {
		if (null == stringObj) {
			return "";
		}

		return stringObj.toString();
	}

	/**
	 * 判断一个字符串是不是有值，非 NULL||空格||空串
	 * 
	 * @param str
	 * @return
	 */
	public static boolean isNotEmpty(String str) {
		return null != str && !str.trim().equals("");
	}

	/**
	 * 验证输入的字符串是不是数字(整数、小数等)
	 * 
	 * @param decimal
	 *            要验证的串
	 * @return true/false 是数字/不是数字
	 */
	public static boolean isDecimal(String decimal) {
		return Pattern.compile("[0-9]+(.[0-9]+)?").matcher(decimal.trim()).matches();
	}

	/**
	 * 根据指定格式获取当前时间的字符
	 * 
	 * @param format
	 *            指定的格式
	 * @return
	 */
	public static String getDateFormat(String format) {
		SimpleDateFormat dateFormat = new SimpleDateFormat(format);

		return dateFormat.format(new Date());
	}

	/**
	 * 根据指定格式获取当前时间的字符
	 * 
	 * @param format
	 *            指定的格式
	 * @return
	 */
	public static String getDateFormat(String format, Date date) {
		SimpleDateFormat dateFormat = new SimpleDateFormat(format);

		return dateFormat.format(date);
	}

	public static long getTime(String time, String format) {
		try {
			return new SimpleDateFormat(format).parse(time).getTime();
		} catch (Exception e) {
			return 0l;
		}
	}

	/**
	 * 格式化小数
	 * 
	 * @param maximumFractionDigits
	 *            小数部分保留的最大位数
	 * @return 格式化后的小数
	 */
	public static String formatDouble(double d, int maximumFractionDigits) {
		NumberFormat format = NumberFormat.getNumberInstance();

		format.setMaximumFractionDigits(maximumFractionDigits);

		return format.format(d);
	}

	/**
	 * 获取本机local area network ip
	 * 
	 * @return
	 */
	public static String getLocalIP() {
		StringBuilder IFCONFIG = new StringBuilder();
		try {
			for (Enumeration<NetworkInterface> en = NetworkInterface.getNetworkInterfaces(); en.hasMoreElements();) {
				NetworkInterface intf = en.nextElement();
				for (Enumeration<InetAddress> enumIpAddr = intf.getInetAddresses(); enumIpAddr.hasMoreElements();) {
					InetAddress inetAddress = enumIpAddr.nextElement();
					if (!inetAddress.isLoopbackAddress() && !inetAddress.isLinkLocalAddress() && inetAddress.isSiteLocalAddress()) {
						IFCONFIG.append(inetAddress.getHostAddress().toString());
					}

				}
			}
		} catch (SocketException ex) {
		}

		return IFCONFIG.toString();
	}

	/**
	 * obtain uuid in split-lower case format
	 * 
	 * @return
	 */
	public static String uuid() {
		return UUID.randomUUID().toString().replaceAll("-", "").toLowerCase();
	}

	/**
	 * 生成请求的rid
	 * 
	 * @return
	 */
	public static String generateRID() {
		String rid = System.currentTimeMillis() + "" + new Random().nextInt(10000);

		return rid;
	}

	/**
	 * 序列化一个对象
	 * 
	 * @param object
	 *            要序列化的对象
	 * @return 序列化对象后的字节数组
	 */
	public static byte[] serializeObject(Object object) {
		ObjectOutputStream objectOutputStream = null;
		ByteArrayOutputStream byteArrayOutputStream = null;

		try {
			byteArrayOutputStream = new ByteArrayOutputStream();
			objectOutputStream = new ObjectOutputStream(byteArrayOutputStream);

			objectOutputStream.writeObject(object);

			return byteArrayOutputStream.toByteArray();
		} catch (Exception e) {
			return null;
		} finally {
			try {
				if (null != byteArrayOutputStream) {
					byteArrayOutputStream.close();
				}

				if (null != objectOutputStream) {
					objectOutputStream.close();
				}
			} catch (Exception e) {

			}
		}
	}

	/**
	 * 反序列化对象
	 * 
	 * @param objectBytes
	 *            对象的字节数组
	 * @return 反序列化后的对象
	 */
	public static Object unserializeObject(byte[] objectBytes) {
		ObjectInputStream objectInputStream = null;
		ByteArrayInputStream byteArrayInputStream = null;

		try {
			byteArrayInputStream = new ByteArrayInputStream(objectBytes);
			objectInputStream = new ObjectInputStream(byteArrayInputStream);

			return objectInputStream.readObject();
		} catch (Exception e) {
			return null;
		} finally {
			try {
				if (null != byteArrayInputStream) {
					byteArrayInputStream.close();
				}

				if (null != objectInputStream) {
					objectInputStream.close();
				}
			} catch (Exception e) {

			}

		}
	}

	/***
	 * 求MD5值
	 * 
	 * @param source
	 * @return
	 */
	public static String getMD5(byte[] source) {
		String s = null;
		char hexDigits[] = { '0', '1', '2', '3', '4', '5', '6', '7', '8', '9', 'a', 'b', 'c', 'd', 'e', 'f' };// 用来将字节转换成16进制表示的字符
		try {
			java.security.MessageDigest md = java.security.MessageDigest.getInstance("MD5");
			md.update(source);
			byte tmp[] = md.digest();// MD5 的计算结果是一个 128 位的长整数，
			// 用字节表示就是 16 个字节
			char str[] = new char[16 * 2];// 每个字节用 16 进制表示的话，使用两个字符， 所以表示成 16
			// 进制需要 32 个字符
			int k = 0;// 表示转换结果中对应的字符位置
			for (int i = 0; i < 16; i++) {// 从第一个字节开始，对 MD5 的每一个字节// 转换成 16
				// 进制字符的转换
				byte byte0 = tmp[i];// 取第 i 个字节
				str[k++] = hexDigits[byte0 >>> 4 & 0xf];// 取字节中高 4 位的数字转换,// >>>
				// 为逻辑右移，将符号位一起右移
				str[k++] = hexDigits[byte0 & 0xf];// 取字节中低 4 位的数字转换

			}
			s = new String(str);// 换后的结果转换为字符串

		} catch (NoSuchAlgorithmException e) {
			e.printStackTrace();
		}
		return s;
	}

}
